home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / comm / ums / newclean.lha / QuitUMS.rexx < prev    next >
OS/2 REXX Batch file  |  1995-08-08  |  258b  |  14 lines
  1. /* quit the currently running default UMS server */
  2.  
  3. libname = "ums.library"
  4.  
  5. if ~show("L", libname) then do
  6.   if ~addlib(libname, 0, -210, 8) then do
  7.     say libname "not found!"
  8.     exit
  9.   end
  10. end
  11.  
  12. say "quitting..."
  13. call UMSServerControl("Quit","default")
  14.